home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 37 / Tiger_Disk_037_19xx_Tiger-Crew-Disk_de_Side_A.d64 / sound 1 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  232b  |  7 lines
  1. 10 rem   ******  sound 1  ******
  2. 11 fori=54272to54295:pokei,0:nexti
  3. 12 poke54296,15:poke54277,8:poke54278,255:poke54276,23
  4. 13 forz=1to5:a=2:fory=1to3:b=8:poke54273,a
  5. 14 fori=1to6:poke54287,b:b=b*1.4:nexti:a=a*1.5:nexty
  6. 15 fori=1to10:poke54287,b:b=b*1.05:nexti:nextz:poke54278,15:end
  7.